﻿Public Class rptBaoCao

    Function getData() As DataTable
        Return DataProvider.LoadTable("select * from HOADON")
    End Function

    Public Sub LayDuLieuVaoCot()
        
        Try
            clmMAKH.DataBindings.Add("MAKH", DataSource, "MAKH")
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        End Try
        'XrTableCell2.DataBindings.Add("text", DataSource, "MAKH")
    End Sub
End Class